***********************************************************************************************************************
**** Figure in A11  ***************************************************************************************************
***********************************************************************************************************************


use "$data/Non_payment_dataset_ready.dta" , clear


hist asinhpayment if t<=12 & itt!=.,  frac  color(gs8) ylabel(0(0.1)0.8 , grid glcolor(gs14) angle(0) format(%9.2f)) xtitle(Inverse hyperbolic sine of payment amount in N$) title(Histogram of Payment Amount, color(black)) subt(Pre-intervention year) graphregion(color(white)) ytitle(Fraction of payments) 

graph export "$filepath/output_logs/figure in A11.pdf", replace
